home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 49
- Top = 10
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Form1'
- ClientHeight = 403
- ClientWidth = 533
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- TextHeight = 16
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 533
- Height = 403
- Align = alClient
- AutoSize = True
- Center = True
- Picture.Data = {<image000.bmp>}
- end
- object Label2: TLabel
- Left = 415
- Top = 92
- Width = 97
- Height = 22
- Caption = 'Way to Exit'
- Font.Color = clWhite
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label3: TLabel
- Left = 223
- Top = 40
- Width = 178
- Height = 97
- AutoSize = False
- Caption = 'Power Source '
- Font.Color = clYellow
- Font.Height = -37
- Font.Name = 'EngrvrsOldEng Bd BT'
- Font.Style = []
- ParentFont = False
- Transparent = True
- end
- object Bevel1: TBevel
- Left = 0
- Top = 0
- Width = 533
- Height = 403
- Align = alClient
- Shape = bsFrame
- Style = bsRaised
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 15
- Top = 28
- Width = 194
- Height = 109
- ItemHeight = 16
- TabOrder = 0
- OnChange = DirectoryListBox1Change
- end
- object BitBtn1: TBitBtn
- Left = 400
- Top = 36
- Width = 49
- Height = 45
- Font.Color = clRed
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- OnClick = BitBtn1Click
- Kind = bkClose
- Layout = blGlyphTop
- end
- object FileListBox1: TFileListBox
- Left = 15
- Top = 172
- Width = 194
- Height = 213
- ItemHeight = 16
- TabOrder = 2
- end
- object BitBtn2: TBitBtn
- Left = 387
- Top = 276
- Width = 94
- Height = 29
- Hint = 'Swicth to on/off'
- Caption = 'Music On'
- Font.Color = clTeal
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = BitBtn2Click
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333FF3333333333333003333333333333377F333333333333
- 30003FFFFFFFFFFFF77707777777777777707777777777777777033333333333
- 33307FFFFFFFFFFFFFF707777777700777707777777777777777030333333000
- 33307F7FFFFFF777FFF707770077777077707777777777777777030300033330
- 33307F7F777FFFF7FFF707777707777077777777777777777777033333033330
- 33337FFFFF7FFFF7FFFF07777707777077777777777777777777333333000000
- 3333333333777777F33333333303333033333333337FFFF7F333333333000000
- 33333333337777773333333333333333333333333333333333330000}
- NumGlyphs = 2
- end
- object MediaPlayer1: TMediaPlayer
- Left = 95
- Top = 149
- Width = 253
- Height = 20
- Visible = False
- TabOrder = 4
- end
- object BitBtn3: TBitBtn
- Left = 408
- Top = 212
- Width = 92
- Height = 29
- Hint = 'Print Files Name'
- Caption = 'Print Files'
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
- 8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
- 8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
- 8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
- 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
- 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
- 33333337FFFF7733333333300000033333333337777773333333}
- NumGlyphs = 2
- end
- object v31: TBitBtn
- Left = 238
- Top = 233
- Width = 107
- Height = 33
- Hint = 'Gif Viewer For Windows 3.1'
- Caption = '3.1 Viewer'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = v31Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
- 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
- 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- end
- object v95: TBitBtn
- Left = 238
- Top = 304
- Width = 107
- Height = 42
- Hint = 'Gif slide show For windows 95'
- Caption = '95 Viewer'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 7
- OnClick = v95Click
- Glyph.Data = {
- 76020000424D7602000000000000760000002800000020000000200000000100
- 0400000000000002000000000000000000000000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF004D4444444444
- 4444644444444444444D44D4444444444446C6444444444444D4444D44444444
- 446C6C64444444444D444444D444444446C6C6C644444444D44444444D444444
- 6C6C6C6C6444444D4444444444D44446C6C6C6C6C64444D444444444444D446C
- 6C6C6C6C6C644D44444444444444D6C6C6C6C6C6C6C6D4444444444444446D6C
- 6C6C6C6C6C6D6444444444444446C6D6C6C6C6C6C6D6C64444444444446C6C6D
- 6C6C6C6C6D6C6C644444444446C6C6C6D6C6C6C6D6C6C6C6444444446C6C6C6C
- 6D6C6C6D6C6C6C6C64444446C6C6C6C6C6D6C6D6C6C6C6C6C644446C6C6C6C6C
- 6C6D6D6C6C6C6C6C6C6446C6C6C6C6C6C6C6D6C6C6C6C6C6C6C6446C6C6C6C6C
- 6C6D6D6C6C6C6C6C6C644446C6C6C6C6C6D6C6D6C6C6C6C6C64444446C6C6C6C
- 6D6C6C6D6C6C6C6C6444444446C6C6C6D6C6C6C6D6C6C6C644444444446C6C6D
- 6C6C6C6C6D6C6C64444444444446C6D6C6C6C6C6C6D6C6444444444444446D6C
- 6C6C6C6C6C6D6444444444444444D6C6C6C6C6C6C6C6D44444444444444D446C
- 6C6C6C6C6C644D444444444444D44446C6C6C6C6C64444D4444444444D444444
- 6C6C6C6C6444444D44444444D444444446C6C6C644444444D444444D44444444
- 446C6C64444444444D4444D4444444444446C6444444444444D44D4444444444
- 4444644444444444444DD4444444444444444444444444444444}
- end
- object ListBox1: TListBox
- Left = 382
- Top = 137
- Width = 121
- Height = 24
- ItemHeight = 16
- Items.Strings = (
- '\autorun\b1.wav'
- '\autorun\b2.wav'
- '\autorun\b3.wav')
- TabOrder = 8
- Visible = False
- end
- object Timer1: TTimer
- OnTimer = Timer1Timer
- Left = 233
- Top = 158
- end
- end
-